home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 7 / FM Towns Free Software Collection 7.iso / t_os / komei4 / komei4.exe / ICON / TO_K.HD6 < prev   
Text File  |  1993-06-10  |  872b  |  87 lines
  1. ds_name        db    'MOJ\TO_K',0
  2. paint_wd:
  3.  
  4.     SET_P dt1
  5.  
  6.  
  7. re_paint:
  8.      WD_CLS 0
  9.      BOX    boxdt,1
  10.  
  11.  
  12.     mov    ah,2
  13.     mov    al,0
  14.     call     MOUSE
  15.  
  16.     call r_con_dt
  17.     
  18.     mov    ah,100
  19.     mov    al,29
  20.     call    komei1
  21.  
  22.     mov    ah,2
  23.     mov    al,1
  24.     call     MOUSE
  25.      ret
  26.  
  27.  
  28. r_con_dt:
  29.     call    sub_edi
  30.     dw    0,1,1,1,32,0,199,0
  31.  
  32. be_called:
  33.     YOMU    ax,300
  34.     cmp    ax,500
  35.     je    re_paint
  36.      ret
  37.  
  38. mouse_in:
  39.       cmp ch,1
  40.  
  41.      je find2
  42.       ret
  43.  
  44. find2:
  45.  
  46.     KAKU word ptr 300,1000    ;プログラムの終わり
  47.     CALL_P dt1
  48.  
  49.  
  50.     mov    ah,202        ;起動画面へ
  51.     call    komei
  52.  
  53.  
  54. zzz:
  55.      BOOK
  56.      mov edi,20[esi]
  57.      call EGB
  58.      ret
  59.  
  60. look_me:
  61.      call sub_esi
  62.      dd 0,0
  63.      dw     1,0,33,33,639-33,479-33*2,1,15,0,0
  64.  
  65.  
  66.  
  67. boxdt:
  68.     call sub_edi
  69.         dw    1,33,33,0,0,0,20,4,15,0
  70.  
  71.  
  72. ; [count][sz_x][sz_y][off_x][off_y][+x][+y][f_col][b_col][s_no]
  73.  
  74.  
  75. dt1:
  76.     call sub_edi
  77.     dw ?
  78.     db 'END1',0
  79.  
  80. p_call:
  81.  
  82.     M_P_CALL
  83.  
  84. p_set:
  85.     M_P_SET
  86.  
  87.